home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•Games Parlour•
/
•Yahtzee•
/
Hyper Yahtzee 4.0
/
Hyper Yahtzee 4.0.rsrc
/
XFCN_2000_CALCODDS.txt
< prev
next >
Wrap
Text File
|
1990-10-02
|
38KB
|
689 lines
start:
00000000 4E56 0000 link A6, 0
00000004 2F2E 0008 move.l -[A7], [A6 + 0x8]
00000008 4EBA 0534 jsr [PC + 0x534 /* 0000053E */]
0000000C 4E5E unlink A6
0000000E 2E9F move.l [A7], [A7]+
00000010 4E75 rts
00000012 C54E exg A2, A6
00000014 5452 addq.w [A2], 2
00000016 5950 subq.w [A0], 4
00000018 4F49 chk.w D7, A1
0000001A 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 0000001C-00000020
fn0000001C:
0000001C 4E56 FF00 link A6, -0x0100
// end alternate branch 0000001C-00000020
fn0000001C: // (misaligned)
0000001E FF00 .extension 0xF00 <<F/4-5/7>> // unimplemented
00000020 2F0C move.l -[A7], A4
00000022 206E 000C movea.l A0, [A6 + 0xC]
00000026 43EE FF00 lea.l A1, [A6 - 0x100]
0000002A 703F moveq.l D0, 0x3F
label0000002C:
0000002C 22D8 move.l [A1]+, [A0]+
0000002E 51C8 FFFC dbf D0, -0x6 /* 0000002C */
00000032 206E 0008 movea.l A0, [A6 + 0x8]
00000036 2868 0008 movea.l A4, [A0 + 0x8]
0000003A 41EE FF00 lea.l A0, [A6 - 0x100]
0000003E 2948 0050 move.l [A4 + 0x50], A0
00000042 397C 0007 004C move.w [A4 + 0x4C], 0x7
00000048 2F2C 0048 move.l -[A7], [A4 + 0x48]
0000004C 205F movea.l A0, [A7]+
0000004E 4E90 jsr [A0]
00000050 2D6C 0070 0010 move.l [A6 + 0x10], [A4 + 0x70]
00000056 285F movea.l A4, [A7]+
00000058 4E5E unlink A6
0000005A 205F movea.l A0, [A7]+
0000005C 504F addq.w A7, 8
0000005E 4ED0 jmp [A0]
00000060 D041 add.w D0, D1
00000062 5354 subq.w [A4], 1
00000064 4F5A chk.w D7, [A2]+
00000066 4552 chk.w D2, [A2]
00000068 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 0000006A-00000070
fn0000006A:
0000006A 4E56 0000 link A6, 0
0000006E 2F0C move.l -[A7], A4
// end alternate branch 0000006A-00000070
fn0000006A: // (misaligned)
0000006C 0000 2F0C ori.b D0, 0xC
00000070 206E 0008 movea.l A0, [A6 + 0x8]
00000074 2868 0008 movea.l A4, [A0 + 0x8]
00000078 296E 0010 0050 move.l [A4 + 0x50], [A6 + 0x10]
0000007E 296E 000C 0054 move.l [A4 + 0x54], [A6 + 0xC]
00000084 397C 0008 004C move.w [A4 + 0x4C], 0x8
0000008A 2F2C 0048 move.l -[A7], [A4 + 0x48]
0000008E 205F movea.l A0, [A7]+
00000090 4E90 jsr [A0]
00000092 285F movea.l A4, [A7]+
00000094 4E5E unlink A6
00000096 205F movea.l A0, [A7]+
00000098 DEFC 000C add.w A7, 0xC
0000009C 4ED0 jmp [A0]
0000009E DA45 add.w D5, D5
000000A0 524F addq.w A7, 1
000000A2 544F addq.w A7, 2
000000A4 5041 addq.w D1, 8
000000A6 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 000000A8-000000AC
fn000000A8:
000000A8 4E56 FFE0 link A6, -0x0020
// end alternate branch 000000A8-000000AC
fn000000A8: // (misaligned)
000000AA FFE0 .invalid <<F/7/7>>
000000AC 2F0C move.l -[A7], A4
000000AE 206E 000C movea.l A0, [A6 + 0xC]
000000B2 43EE FFE0 lea.l A1, [A6 - 0x20]
000000B6 7007 moveq.l D0, 0x07
label000000B8:
000000B8 22D8 move.l [A1]+, [A0]+
000000BA 51C8 FFFC dbf D0, -0x6 /* 000000B8 */
000000BE 206E 0008 movea.l A0, [A6 + 0x8]
000000C2 2868 0008 movea.l A4, [A0 + 0x8]
000000C6 41EE FFE0 lea.l A0, [A6 - 0x20]
000000CA 2948 0050 move.l [A4 + 0x50], A0
000000CE 397C 000A 004C move.w [A4 + 0x4C], 0xA /* '\n' */
000000D4 2F2C 0048 move.l -[A7], [A4 + 0x48]
000000D8 205F movea.l A0, [A7]+
000000DA 4E90 jsr [A0]
000000DC 2D6C 0070 0010 move.l [A6 + 0x10], [A4 + 0x70]
000000E2 285F movea.l A4, [A7]+
000000E4 4E5E unlink A6
000000E6 205F movea.l A0, [A7]+
000000E8 504F addq.w A7, 8
000000EA 4ED0 jmp [A0]
000000EC D354 add.w [A4], D1
000000EE 5254 addq.w [A4], 1
000000F0 4F4E chk.w D7, A6
000000F2 554D subq.w A5, 2
000000F4 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 000000F6-000000FA
fn000000F6:
000000F6 4E56 FFE0 link A6, -0x0020
// end alternate branch 000000F6-000000FA
fn000000F6: // (misaligned)
000000F8 FFE0 .invalid <<F/7/7>>
000000FA 2F0C move.l -[A7], A4
000000FC 206E 0008 movea.l A0, [A6 + 0x8]
00000100 2868 0008 movea.l A4, [A0 + 0x8]
00000104 296E 000C 0050 move.l [A4 + 0x50], [A6 + 0xC]
0000010A 41EE FFE0 lea.l A0, [A6 - 0x20]
0000010E 2948 0054 move.l [A4 + 0x54], A0
00000112 397C 000E 004C move.w [A4 + 0x4C], 0xE
00000118 2F2C 0048 move.l -[A7], [A4 + 0x48]
0000011C 205F movea.l A0, [A7]+
0000011E 4E90 jsr [A0]
00000120 206E 0010 movea.l A0, [A6 + 0x10]
00000124 43EE FFE0 lea.l A1, [A6 - 0x20]
00000128 7007 moveq.l D0, 0x07
label0000012A:
0000012A 20D9 move.l [A0]+, [A1]+
0000012C 51C8 FFFC dbf D0, -0x6 /* 0000012A */
00000130 285F movea.l A4, [A7]+
00000132 4E5E unlink A6
00000134 205F movea.l A0, [A7]+
00000136 504F addq.w A7, 8
00000138 4ED0 jmp [A0]
0000013A CE55 and.w D7, [A5]
0000013C 4D54 chk.w D6, [A4]
0000013E 4F53 chk.w D7, [A3]
00000140 5452 addq.w [A2], 2
00000142 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 00000144-00000148
fn00000144:
00000144 4E56 FF00 link A6, -0x0100
// end alternate branch 00000144-00000148
fn00000144: // (misaligned)
00000146 FF00 .extension 0xF00 <<F/4-5/7>> // unimplemented
00000148 2F0C move.l -[A7], A4
0000014A 206E 0010 movea.l A0, [A6 + 0x10]
0000014E 43EE FF00 lea.l A1, [A6 - 0x100]
00000152 703F moveq.l D0, 0x3F
label00000154:
00000154 22D8 move.l [A1]+, [A0]+
00000156 51C8 FFFC dbf D0, -0x6 /* 00000154 */
0000015A 206E 0008 movea.l A0, [A6 + 0x8]
0000015E 2868 0008 movea.l A4, [A0 + 0x8]
00000162 41EE FF00 lea.l A0, [A6 - 0x100]
00000166 2948 0050 move.l [A4 + 0x50], A0
0000016A 296E 000C 0054 move.l [A4 + 0x54], [A6 + 0xC]
00000170 397C 0013 004C move.w [A4 + 0x4C], 0x13
00000176 2F2C 0048 move.l -[A7], [A4 + 0x48]
0000017A 205F movea.l A0, [A7]+
0000017C 4E90 jsr [A0]
0000017E 285F movea.l A4, [A7]+
00000180 4E5E unlink A6
00000182 205F movea.l A0, [A7]+
00000184 DEFC 000C add.w A7, 0xC
00000188 4ED0 jmp [A0]
0000018A D345 addx.w D1, D5
0000018C 5447 addq.w D7, 2
0000018E 4C4F 4241 movem.l D0,D6,A1,A6, A7
00000192 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 00000194-00000198
fn00000194:
00000194 4E56 FFFE link A6, -0x0002
// end alternate branch 00000194-00000198
fn00000194: // (misaligned)
00000196 FFFE .invalid <<F/7/7>>
00000198 48E7 0108 movem.l -[A7], D7,A4
0000019C 286E 0008 movea.l A4, [A6 + 0x8]
000001A0 422C FF00 clr.b [A4 - 0x100]
000001A4 7E01 moveq.l D7, 0x01
000001A6 600E bra +0x10 /* 000001B6 */
label000001A8:
000001A8 3007 move.w D0, D7
000001AA D040 add.w D0, D0
000001AC 41EC FEDA lea.l A0, [A4 - 0x126]
000001B0 4270 0000 clr.w [A0 + D0.w]
000001B4 5247 addq.w D7, 1
label000001B6:
000001B6 0C47 000D cmpi.w D7, 0xD /* '\r' */
000001BA 6FEC ble -0x12 /* 000001A8 */
000001BC 7E01 moveq.l D7, 0x01
000001BE 6032 bra +0x34 /* 000001F2 */
label000001C0:
000001C0 3007 move.w D0, D7
000001C2 D040 add.w D0, D0
000001C4 41EC FECE lea.l A0, [A4 - 0x132]
000001C8 4270 0000 clr.w [A0 + D0.w]
000001CC 3007 move.w D0, D7
000001CE 7200 moveq.l D1, 0x00
000001D0 5340 subq.w D0, 1
000001D2 0241 0001 andi.w D1, 0x1
000001D6 3400 move.w D2, D0
000001D8 0242 0007 andi.w D2, 0x7
000001DC E648 lsr D0.w, 3
000001DE 43EC FECF lea.l A1, [A4 - 0x131]
000001E2 41F1 0000 lea.l A0, [A1 + D0.w]
000001E6 70FE moveq.l D0, 0xFFFFFFFE
000001E8 E538 rol D0.b, D2
000001EA E529 lsl D1.b, D2
000001EC C110 and.b [A0], D0
000001EE 8310 or.b [A0], D1
000001F0 5247 addq.w D7, 1
label000001F2:
000001F2 0C47 0006 cmpi.w D7, 0x6
000001F6 6FC8 ble -0x36 /* 000001C0 */
000001F8 7E01 moveq.l D7, 0x01
000001FA 6078 bra +0x7A /* 00000274 */
label000001FC:
000001FC 3007 move.w D0, D7
000001FE D040 add.w D0, D0
00000200 41EC FEF4 lea.l A0, [A4 - 0x10C]
00000204 3230 0000 move.w D1, [A0 + D0.w]
00000208 D241 add.w D1, D1
0000020A 3007 move.w D0, D7
0000020C D040 add.w D0, D0
0000020E 41EC FEF4 lea.l A0, [A4 - 0x10C]
00000212 3430 0000 move.w D2, [A0 + D0.w]
00000216 41EC FEDA lea.l A0, [A4 - 0x126]
0000021A D570 1000 add.w [A0 + D1.w], D2
0000021E 3007 move.w D0, D7
00000220 D040 add.w D0, D0
00000222 41EC FEF4 lea.l A0, [A4 - 0x10C]
00000226 3230 0000 move.w D1, [A0 + D0.w]
0000022A D241 add.w D1, D1
0000022C 41EC FECE lea.l A0, [A4 - 0x132]
00000230 5270 1000 addq.w [A0 + D1.w], 1
00000234 3007 move.w D0, D7
00000236 D040 add.w D0, D0
00000238 41EC FEF4 lea.l A0, [A4 - 0x10C]
0000023C 3230 0000 move.w D1, [A0 + D0.w]
00000240 7001 moveq.l D0, 0x01
00000242 5341 subq.w D1, 1
00000244 0240 0001 andi.w D0, 0x1
00000248 3401 move.w D2, D1
0000024A 0242 0007 andi.w D2, 0x7
0000024E E649 lsr D1.w, 3
00000250 43EC FECF lea.l A1, [A4 - 0x131]
00000254 41F1 1000 lea.l A0, [A1 + D1.w]
00000258 72FE moveq.l D1, 0xFFFFFFFE
0000025A E539 rol D1.b, D2
0000025C E528 lsl D0.b, D2
0000025E C310 and.b [A0], D1
00000260 8110 or.b [A0], D0
00000262 3007 move.w D0, D7
00000264 D040 add.w D0, D0
00000266 41EC FEF4 lea.l A0, [A4 - 0x10C]
0000026A 3230 0000 move.w D1, [A0 + D0.w]
0000026E D36C FEF4 add.w [A4 - 0x10C], D1
00000272 5247 addq.w D7, 1
label00000274:
00000274 0C47 0005 cmpi.w D7, 0x5
00000278 6F82 ble -0x7C /* 000001FC */
0000027A 4CDF 1080 movem.l D7,A4, [A7]+
0000027E 4E5E unlink A6
00000280 2E9F move.l [A7], [A7]+
00000282 4E75 rts
00000284 C341 exg D1, D1
00000286 4C43 3154 movem.l D2,D4,D6,A0,A4,A5, D3
0000028A 4F36 0000 .invalid 7, [A6 + D0.w] // invalid opcode 4 with b == 4
fn0000028E:
0000028E 4E56 FFFE link A6, -0x0002
00000292 48E7 0108 movem.l -[A7], D7,A4
00000296 286E 0008 movea.l A4, [A6 + 0x8]
0000029A 7E01 moveq.l D7, 0x01
0000029C 6000 00AA bra +0xAC /* 00000348 */
label000002A0:
000002A0 3007 move.w D0, D7
000002A2 D040 add.w D0, D0
000002A4 41EC FECE lea.l A0, [A4 - 0x132]
000002A8 0C70 0002 0000 cmpi.w [A0 + D0.w], 0x2
000002AE 6F00 0096 ble +0x98 /* 00000346 */
000002B2 3007 move.w D0, D7
000002B4 D040 add.w D0, D0
000002B6 41EC FECE lea.l A0, [A4 - 0x132]
000002BA 0C70 0005 0000 cmpi.w [A0 + D0.w], 0x5
000002C0 6606 bne +0x8 /* 000002C8 */
000002C2 397C 0032 FEF2 move.w [A4 - 0x10E], 0x32 /* '2' */
label000002C8:
000002C8 3007 move.w D0, D7
000002CA D040 add.w D0, D0
000002CC 41EC FECE lea.l A0, [A4 - 0x132]
000002D0 0C70 0003 0000 cmpi.w [A0 + D0.w], 0x3
000002D6 6F06 ble +0x8 /* 000002DE */
000002D8 396C FEF4 FEEA move.w [A4 - 0x116], [A4 - 0x10C]
label000002DE:
000002DE 3007 move.w D0, D7
000002E0 D040 add.w D0, D0
000002E2 41EC FECE lea.l A0, [A4 - 0x132]
000002E6 0C70 0002 0000 cmpi.w [A0 + D0.w], 0x2
000002EC 6F06 ble +0x8 /* 000002F4 */
000002EE 396C FEF4 FEE8 move.w [A4 - 0x118], [A4 - 0x10C]
label000002F4:
000002F4 3007 move.w D0, D7
000002F6 D040 add.w D0, D0
000002F8 41EC FECE lea.l A0, [A4 - 0x132]
000002FC 0C70 0003 0000 cmpi.w [A0 + D0.w], 0x3
00000302 6642 bne +0x44 /* 00000346 */
00000304 0C6C 0002 FED0 cmpi.w [A4 - 0x130], 0x2
0000030A 57C0 seq D0
0000030C 0C6C 0002 FED2 cmpi.w [A4 - 0x12E], 0x2
00000312 57C1 seq D1
00000314 8001 or.b D0, D1
00000316 0C6C 0002 FED4 cmpi.w [A4 - 0x12C], 0x2
0000031C 57C1 seq D1
0000031E 8001 or.b D0, D1
00000320 0C6C 0002 FED6 cmpi.w [A4 - 0x12A], 0x2
00000326 57C1 seq D1
00000328 8001 or.b D0, D1
0000032A 0C6C 0002 FED8 cmpi.w [A4 - 0x128], 0x2
00000330 57C1 seq D1
00000332 8001 or.b D0, D1
00000334 0C6C 0002 FEDA cmpi.w [A4 - 0x126], 0x2
0000033A 57C1 seq D1
0000033C 8001 or.b D0, D1
0000033E 6706 beq +0x8 /* 00000346 */
00000340 397C 0019 FEEC move.w [A4 - 0x114], 0x19
label00000346:
00000346 5247 addq.w D7, 1
label00000348:
00000348 0C47 0006 cmpi.w D7, 0x6
0000034C 6F00 FF52 ble -0xAC /* 000002A0 */
00000350 4CDF 1080 movem.l D7,A4, [A7]+
00000354 4E5E unlink A6
00000356 2E9F move.l [A7], [A7]+
00000358 4E75 rts
0000035A C341 exg D1, D1
0000035C 4C43 3334 movem.l D2,D4,D5,A0,A1,A4,A5, D3
00000360 3520 move.w -[A2], -[A0]
00000362 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 00000364-0000036A
fn00000364:
00000364 4E56 0000 link A6, 0
00000368 2F0C move.l -[A7], A4
// end alternate branch 00000364-0000036A
fn00000364: // (misaligned)
00000366 0000 2F0C ori.b D0, 0xC
0000036A 286E 0008 movea.l A4, [A6 + 0x8]
0000036E 0C6C 0001 FED2 cmpi.w [A4 - 0x12E], 0x1
00000374 57C0 seq D0
00000376 0C6C 0001 FED4 cmpi.w [A4 - 0x12C], 0x1
0000037C 57C1 seq D1
0000037E C001 and.b D0, D1
00000380 0C6C 0001 FED6 cmpi.w [A4 - 0x12A], 0x1
00000386 57C1 seq D1
00000388 C001 and.b D0, D1
0000038A 0C6C 0001 FED8 cmpi.w [A4 - 0x128], 0x1
00000390 57C1 seq D1
00000392 C001 and.b D0, D1
00000394 670C beq +0xE /* 000003A2 */
00000396 397C 0028 FEF0 move.w [A4 - 0x110], 0x28 /* '(' */
0000039C 397C 001E FEEE move.w [A4 - 0x112], 0x1E
label000003A2:
000003A2 285F movea.l A4, [A7]+
000003A4 4E5E unlink A6
000003A6 2E9F move.l [A7], [A7]+
000003A8 4E75 rts
000003AA C341 exg D1, D1
000003AC 4C43 4C53 movem.l D0,D1,D4,D6,A2,A3,A6, D3
000003B0 2020 move.l D0, -[A0]
000003B2 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 000003B4-000003BA
fn000003B4:
000003B4 4E56 0000 link A6, 0
000003B8 2F0C move.l -[A7], A4
// end alternate branch 000003B4-000003BA
fn000003B4: // (misaligned)
000003B6 0000 2F0C ori.b D0, 0xC
000003BA 286E 0008 movea.l A4, [A6 + 0x8]
000003BE 4A6C FED4 tst.w [A4 - 0x12C]
000003C2 56C0 sne D0
000003C4 4A6C FED6 tst.w [A4 - 0x12A]
000003C8 56C1 sne D1
000003CA C001 and.b D0, D1
000003CC 6742 beq +0x44 /* 00000410 */
000003CE 4A6C FED0 tst.w [A4 - 0x130]
000003D2 56C0 sne D0
000003D4 4A6C FED2 tst.w [A4 - 0x12E]
000003D8 56C1 sne D1
000003DA C001 and.b D0, D1
000003DC 6706 beq +0x8 /* 000003E4 */
000003DE 397C 001E FEEE move.w [A4 - 0x112], 0x1E
label000003E4:
000003E4 4A6C FED2 tst.w [A4 - 0x12E]
000003E8 56C0 sne D0
000003EA 4A6C FED8 tst.w [A4 - 0x128]
000003EE 56C1 sne D1
000003F0 C001 and.b D0, D1
000003F2 6706 beq +0x8 /* 000003FA */
000003F4 397C 001E FEEE move.w [A4 - 0x112], 0x1E
label000003FA:
000003FA 4A6C FED8 tst.w [A4 - 0x128]
000003FE 56C0 sne D0
00000400 4A6C FEDA tst.w [A4 - 0x126]
00000404 56C1 sne D1
00000406 C001 and.b D0, D1
00000408 6706 beq +0x8 /* 00000410 */
0000040A 397C 001E FEEE move.w [A4 - 0x112], 0x1E
label00000410:
00000410 285F movea.l A4, [A7]+
00000412 4E5E unlink A6
00000414 2E9F move.l [A7], [A7]+
00000416 4E75 rts
00000418 C341 exg D1, D1
0000041A 4C43 5353 movem.l D0,D1,D4,D6,A0,A1,A4,A6, D3
0000041E 2020 move.l D0, -[A0]
00000420 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 00000422-00000426
fn00000422:
00000422 4E56 FDDE link A6, -0x0222
// end alternate branch 00000422-00000426
fn00000422: // (misaligned)
00000424 FDDE .invalid <<F/7/6>>
00000426 48E7 0108 movem.l -[A7], D7,A4
0000042A 286E 0008 movea.l A4, [A6 + 0x8]
0000042E 7E01 moveq.l D7, 0x01
00000430 6054 bra +0x56 /* 00000486 */
label00000432:
00000432 486E FDDE pea.l [A6 - 0x222]
00000436 3007 move.w D0, D7
00000438 D040 add.w D0, D0
0000043A 41EC FEDA lea.l A0, [A4 - 0x126]
0000043E 3230 0000 move.w D1, [A0 + D0.w]
00000442 48C1 ext.l D1
00000444 2F01 move.l -[A7], D1
00000446 2F2E 0008 move.l -[A7], [A6 + 0x8]
0000044A 4EBA FCAA jsr [PC - 0x356 /* 000000F6 */]
0000044E 205F movea.l A0, [A7]+
00000450 43EE FF00 lea.l A1, [A6 - 0x100]
00000454 7007 moveq.l D0, 0x07
label00000456:
00000456 22D8 move.l [A1]+, [A0]+
00000458 51C8 FFFC dbf D0, -0x6 /* 00000456 */
0000045C 486C FF00 pea.l [A4 - 0x100]
00000460 486E FF00 pea.l [A6 - 0x100]
00000464 487A 003E pea.l [PC + 0x3E /* 000004A4, value 0x12C4E56 */]
00000468 486E FDFE pea.l [A6 - 0x202]
0000046C 3F3C 0003 move.w -[A7], 0x3
00000470 4EBA 0220 jsr [PC + 0x220 /* 00000692 */]
00000474 41EC FF00 lea.l A0, [A4 - 0x100]
00000478 43EE FDFE lea.l A1, [A6 - 0x202]
0000047C 703F moveq.l D0, 0x3F
label0000047E:
0000047E 20D9 move.l [A0]+, [A1]+
00000480 51C8 FFFC dbf D0, -0x6 /* 0000047E */
00000484 5247 addq.w D7, 1
label00000486:
00000486 0C47 000D cmpi.w D7, 0xD /* '\r' */
0000048A 6FA6 ble -0x58 /* 00000432 */
0000048C 532C FF00 subq.b [A4 - 0x100], 1
00000490 4CDF 1080 movem.l D7,A4, [A7]+
00000494 4E5E unlink A6
00000496 2E9F move.l [A7], [A7]+
00000498 4E75 rts
0000049A C34F exg A1, A7
0000049C 4E56 4552 link A6, -0xFFFFBAAE
000004A0 5450 addq.w [A0], 2
000004A2 0002 012C ori.b D2, 0x2C /* ',' */
fn000004A6:
000004A6 4E56 FEFE link A6, -0x0102
000004AA 48E7 0108 movem.l -[A7], D7,A4
000004AE 286E 0008 movea.l A4, [A6 + 0x8]
000004B2 422C FF00 clr.b [A4 - 0x100]
000004B6 7E01 moveq.l D7, 0x01
000004B8 605E bra +0x60 /* 00000518 */
label000004BA:
000004BA 3007 move.w D0, D7
000004BC 5340 subq.w D0, 1
000004BE 3200 move.w D1, D0
000004C0 E641 asr D1.w, 3
000004C2 41EC FECF lea.l A0, [A4 - 0x131]
000004C6 0130 1000 btst [A0 + D1.w], D0
000004CA 6726 beq +0x28 /* 000004F2 */
000004CC 486C FF00 pea.l [A4 - 0x100]
000004D0 487A 0068 pea.l [PC + 0x68 /* 0000053A, value 0x2312C00, pstring "1," */]
000004D4 486E FEFE pea.l [A6 - 0x102]
000004D8 3F3C 0002 move.w -[A7], 0x2
000004DC 4EBA 01B4 jsr [PC + 0x1B4 /* 00000692 */]
000004E0 41EC FF00 lea.l A0, [A4 - 0x100]
000004E4 43EE FEFE lea.l A1, [A6 - 0x102]
000004E8 703F moveq.l D0, 0x3F
label000004EA:
000004EA 20D9 move.l [A0]+, [A1]+
000004EC 51C8 FFFC dbf D0, -0x6 /* 000004EA */
000004F0 6024 bra +0x26 /* 00000516 */
label000004F2:
000004F2 486C FF00 pea.l [A4 - 0x100]
000004F6 487A 003E pea.l [PC + 0x3E /* 00000536, value 0x2302C00, pstring "0," */]
000004FA 486E FEFE pea.l [A6 - 0x102]
000004FE 3F3C 0002 move.w -[A7], 0x2
00000502 4EBA 018E jsr [PC + 0x18E /* 00000692 */]
00000506 41EC FF00 lea.l A0, [A4 - 0x100]
0000050A 43EE FEFE lea.l A1, [A6 - 0x102]
0000050E 703F moveq.l D0, 0x3F
label00000510:
00000510 20D9 move.l [A0]+, [A1]+
00000512 51C8 FFFC dbf D0, -0x6 /* 00000510 */
label00000516:
00000516 5247 addq.w D7, 1
label00000518:
00000518 0C47 0006 cmpi.w D7, 0x6
0000051C 6F9C ble -0x62 /* 000004BA */
0000051E 532C FF00 subq.b [A4 - 0x100], 1
00000522 4CDF 1080 movem.l D7,A4, [A7]+
00000526 4E5E unlink A6
00000528 2E9F move.l [A7], [A7]+
0000052A 4E75 rts
0000052C D04F add.w D0, A7
0000052E 5343 subq.w D3, 1
00000530 4F4E chk.w D7, A6
00000532 5645 addq.w D5, 3
00000534 0008 0230 ori.b A0, 0x30 /* '0' */
00000538 2C00 move.l D6, D0
0000053A 0231 2C00 4E56 andi.b [A1 + D4 * 8 + 0x56], 0x0
// begin alternate branch 0000053E-00000550
fn0000053E:
0000053E 4E56 FECA link A6, -0x0136
00000542 48E7 0018 movem.l -[A7], A3,A4
00000546 286E 0008 movea.l A4, [A6 + 0x8]
0000054A 206C 0002 movea.l A0, [A4 + 0x2]
0000054E 2F10 move.l -[A7], [A0]
// end alternate branch 0000053E-00000550
fn0000053E: // (misaligned)
00000540 FECA 48E7 .extension 0xECA <<F/2-3/7>> // unimplemented
00000544 0018 286E ori.b [A0]+, 0x6E /* 'n' */
00000548 0008 206C ori.b A0, 0x6C /* 'l' */
0000054C 0002 2F10 ori.b D2, 0x10
00000550 486E FF00 pea.l [A6 - 0x100]
00000554 2F0E move.l -[A7], A6
00000556 4EBA FB12 jsr [PC - 0x4EE /* 0000006A */]
0000055A 42A7 clr.l -[A7]
0000055C 486E FF00 pea.l [A6 - 0x100]
00000560 2F0E move.l -[A7], A6
00000562 4EBA FB44 jsr [PC - 0x4BC /* 000000A8 */]
00000566 201F move.l D0, [A7]+
00000568 3D40 FEF6 move.w [A6 - 0x10A], D0
0000056C 206C 0006 movea.l A0, [A4 + 0x6]
00000570 2F10 move.l -[A7], [A0]
00000572 486E FF00 pea.l [A6 - 0x100]
00000576 2F0E move.l -[A7], A6
00000578 4EBA FAF0 jsr [PC - 0x510 /* 0000006A */]
0000057C 42A7 clr.l -[A7]
0000057E 486E FF00 pea.l [A6 - 0x100]
00000582 2F0E move.l -[A7], A6
00000584 4EBA FB22 jsr [PC - 0x4DE /* 000000A8 */]
00000588 201F move.l D0, [A7]+
0000058A 3D40 FEF8 move.w [A6 - 0x108], D0
0000058E 206C 000A movea.l A0, [A4 + 0xA]
00000592 2F10 move.l -[A7], [A0]
00000594 486E FF00 pea.l [A6 - 0x100]
00000598 2F0E move.l -[A7], A6
0000059A 4EBA FACE jsr [PC - 0x532 /* 0000006A */]
0000059E 42A7 clr.l -[A7]
000005A0 486E FF00 pea.l [A6 - 0x100]
000005A4 2F0E move.l -[A7], A6
000005A6 4EBA FB00 jsr [PC - 0x500 /* 000000A8 */]
000005AA 201F move.l D0, [A7]+
000005AC 3D40 FEFA move.w [A6 - 0x106], D0
000005B0 206C 000E movea.l A0, [A4 + 0xE]
000005B4 2F10 move.l -[A7], [A0]
000005B6 486E FF00 pea.l [A6 - 0x100]
000005BA 2F0E move.l -[A7], A6
000005BC 4EBA FAAC jsr [PC - 0x554 /* 0000006A */]
000005C0 42A7 clr.l -[A7]
000005C2 486E FF00 pea.l [A6 - 0x100]
000005C6 2F0E move.l -[A7], A6
000005C8 4EBA FADE jsr [PC - 0x522 /* 000000A8 */]
000005CC 201F move.l D0, [A7]+
000005CE 3D40 FEFC move.w [A6 - 0x104], D0
000005D2 206C 0012 movea.l A0, [A4 + 0x12]
000005D6 2F10 move.l -[A7], [A0]
000005D8 486E FF00 pea.l [A6 - 0x100]
000005DC 2F0E move.l -[A7], A6
000005DE 4EBA FA8A jsr [PC - 0x576 /* 0000006A */]
000005E2 42A7 clr.l -[A7]
000005E4 486E FF00 pea.l [A6 - 0x100]
000005E8 2F0E move.l -[A7], A6
000005EA 4EBA FABC jsr [PC - 0x544 /* 000000A8 */]
000005EE 201F move.l D0, [A7]+
000005F0 3D40 FEFE move.w [A6 - 0x102], D0
000005F4 2F0E move.l -[A7], A6
000005F6 4EBA FB9C jsr [PC - 0x464 /* 00000194 */]
000005FA 2F0E move.l -[A7], A6
000005FC 4EBA FC90 jsr [PC - 0x370 /* 0000028E */]
00000600 4A6E FEE8 tst.w [A6 - 0x118]
00000604 6612 bne +0x14 /* 00000618 */
00000606 2F0E move.l -[A7], A6
00000608 4EBA FD5A jsr [PC - 0x2A6 /* 00000364 */]
0000060C 4A6E FEF0 tst.w [A6 - 0x110]
00000610 6606 bne +0x8 /* 00000618 */
00000612 2F0E move.l -[A7], A6
00000614 4EBA FD9E jsr [PC - 0x262 /* 000003B4 */]
label00000618:
00000618 2F0E move.l -[A7], A6
0000061A 4EBA FE06 jsr [PC - 0x1FA /* 00000422 */]
0000061E 42A7 clr.l -[A7]
00000620 486E FF00 pea.l [A6 - 0x100]
00000624 2F0E move.l -[A7], A6
00000626 4EBA F9F4 jsr [PC - 0x60C /* 0000001C */]
0000062A 295F 0042 move.l [A4 + 0x42], [A7]+
0000062E 2F0E move.l -[A7], A6
00000630 4EBA FE74 jsr [PC - 0x18C /* 000004A6 */]
00000634 42A7 clr.l -[A7]
00000636 486E FF00 pea.l [A6 - 0x100]
0000063A 2F0E move.l -[A7], A6
0000063C 4EBA F9DE jsr [PC - 0x622 /* 0000001C */]
00000640 265F movea.l A3, [A7]+
00000642 487A 0024 pea.l [PC + 0x24 /* 00000668, value 0x7646963, pstring "dicepos" */]
00000646 2F0B move.l -[A7], A3
00000648 2F0E move.l -[A7], A6
0000064A 4EBA FAF8 jsr [PC - 0x508 /* 00000144 */]
0000064E 2F0B move.l -[A7], A3
00000650 4EBA 0036 jsr [PC + 0x36 /* 00000688 */]
00000654 4CDF 1800 movem.l A3,A4, [A7]+
00000658 4E5E unlink A6
0000065A 2E9F move.l [A7], [A7]+
0000065C 4E75 rts
0000065E C341 exg D1, D1
00000660 4C43 4F44 movem.l D2,D6,A0,A1,A2,A3,A6, D3
00000664 4453 neg.w [A3]
00000666 0008 0764 ori.b A0, 0x64 /* 'd' */
0000066A 6963 bvs +0x65 /* 000006CF */
0000066C 6570 bcs +0x72 /* 000006DE */
0000066E 6F73 ble +0x75 /* 000006E3 */
00000670 225F movea.l A1, [A7]+
00000672 201F move.l D0, [A7]+
00000674 A04C syscall CompactMem
00000676 2E80 move.l [A7], D0
00000678 4E71 nop
0000067A 7000 moveq.l D0, 0x00
label0000067C:
0000067C 2F09 move.l -[A7], A1
label0000067E:
0000067E 31C0 0220 move.w [0x00000220 /* MemErr */], D0
00000682 4E75 rts
00000684 7000 moveq.l D0, 0x00
00000686 60F6 bra -0x8 /* 0000067E */
fn00000688:
00000688 225F movea.l A1, [A7]+
0000068A 205F movea.l A0, [A7]+
0000068C A023 syscall DisposHandle/DisposeHandle
0000068E 4EFA FFEC jmp [PC - 0x14 /* 0000067C */]
fn00000692:
00000692 48E7 E0E0 movem.l -[A7], D0,D1,D2,A0,A1,A2
00000696 43EF 001C lea.l A1, [A7 + 0x1C]
0000069A 3019 move.w D0, [A1]+
0000069C 2059 movea.l A0, [A1]+
0000069E 3400 move.w D2, D0
000006A0 D442 add.w D2, D2
000006A2 D442 add.w D2, D2
000006A4 D2C2 add.w A1, D2
000006A6 4241 clr.w D1
000006A8 5248 addq.w A0, 1
000006AA 6020 bra +0x22 /* 000006CC */
label000006AC:
000006AC 2461 movea.l A2, -[A1]
000006AE 4242 clr.w D2
000006B0 141A move.b D2, [A2]+
000006B2 D242 add.w D1, D2
000006B4 0C41 00FF cmpi.w D1, 0xFF
000006B8 6F0E ble +0x10 /* 000006C8 */
000006BA 0441 00FF subi.w D1, 0xFF
000006BE 9441 sub.w D2, D1
000006C0 323C 00FF move.w D1, 0xFF
000006C4 6002 bra +0x4 /* 000006C8 */
label000006C6:
000006C6 10DA move.b [A0]+, [A2]+
label000006C8:
000006C8 51CA FFFC dbf D2, -0x6 /* 000006C6 */
label000006CC:
000006CC 51C8 FFDE dbf D0, -0x24 /* 000006AC */
000006D0 2061 movea.l A0, -[A1]
000006D2 1081 move.b [A0], D1
000006D4 3021 move.w D0, -[A1]
000006D6 2049 movea.l A0, A1
000006D8 D040 add.w D0, D0
000006DA D040 add.w D0, D0
000006DC D0C0 add.w A0, D0
label000006DE:
000006DE 5448 addq.w A0, 2
000006E0 20A1 move.l [A0], -[A1]
000006E2 2288 move.l [A1], A0
000006E4 4CDF 0707 movem.l D0,D1,D2,A0,A1,A2, [A7]+
000006E8 2E5F movea.l A7, [A7]+
000006EA 4E75 rts